home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2006 December / PCWDEC06.iso / Software / Trial / Paint Shop Pro XI / Data1.cab / _08D07A73C5E2401F91228EFCC8C7492C < prev    next >
Encoding:
Text File  |  2006-08-04  |  4.6 KB  |  127 lines

  1. from PSPApp import *
  2. import PSPUtils
  3.  
  4. def ScriptProperties():
  5.     return {
  6.         'Author': u'Corel Corporation',
  7.         'Copyright': u'Copyright (c) 2002-2006 Corel Corporation. All rights reserved.',
  8.         'Description': "Charcoal Effect",
  9.         'Host': u'Paint Shop Pro 9',
  10.         'Host Version': u'9.00'
  11.         }
  12.  
  13. def Do(Environment):
  14.     # EnableOptimizedScriptUndo
  15.     App.Do( Environment, 'EnableOptimizedScriptUndo', {
  16.             'GeneralSettings': {
  17.                 'ExecutionMode': App.Constants.ExecutionMode.Default, 
  18.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  19.                 'Version': ((9,0,0),1)
  20.                 }
  21.             })
  22.  
  23.     if PSPUtils.IsPaletted(Environment, App.TargetDocument):
  24.         # IncreaseColorsTo16Million
  25.         App.Do( Environment, 'IncreaseColorsTo16Million', {
  26.             'GeneralSettings': {
  27.                 'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  28.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  29.                 'Version': ((9,0,0),1)
  30.                 }
  31.             })
  32.  
  33.     # JPEG Artifact Removal
  34.     App.Do( Environment, 'JPEGArtifactRemoval', {
  35.             'RestoreCrispness': 50, 
  36.             'Strength': App.Constants.JPEGStrength.Normal, 
  37.             'GeneralSettings': {
  38.                 'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  39.                 'RandomSeed': 45565366, 
  40.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  41.                 'Version': ((9,0,0),1)
  42.                 }
  43.             })
  44.  
  45.     # DigitalCameraNoiseRemoval
  46.     App.Do( Environment, 'DigitalCameraNoiseRemoval', {
  47.             'SmallDetails': 50, 
  48.             'MediumDetails': 50, 
  49.             'LargeDetails': 50, 
  50.             'Blending': 70, 
  51.             'Sharpening': 0, 
  52.             'LockDetailSettings': True, 
  53.             'NoiseColorAdjustment': ([4,2520,201,2520],), 
  54.             'Hue': 0, 
  55.             'Range': 0, 
  56.             'MinimalLuminance': -1, 
  57.             'MaximalLuminance': -1, 
  58.             'GeneralSettings': {
  59.                 'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  60.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  61.                 'Version': ((9,0,0),1)
  62.                 }
  63.             })
  64.  
  65.     # FindEdges
  66.     App.Do( Environment, 'FindEdges', {
  67.             'GeneralSettings': {
  68.                 'ExecutionMode': App.Constants.ExecutionMode.Default, 
  69.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  70.                 'Version': ((9,0,0),1)
  71.                 }
  72.             })
  73.  
  74.     # HistogramEqualize
  75.     App.Do( Environment, 'HistogramEqualize', {
  76.             'GeneralSettings': {
  77.                 'ExecutionMode': App.Constants.ExecutionMode.Default, 
  78.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  79.                 'Version': ((9,0,0),1)
  80.                 }
  81.             })
  82.  
  83.     if PSPUtils.IsTrueColor(Environment, App.TargetDocument):
  84.         # Color Adjust Hue Map
  85.         App.Do( Environment, 'ColorAdjustHueMap', {
  86.                 'HueShift': (0,36,72,108,144,180,216,252,288,324), 
  87.                 'LightnessShift': 50, 
  88.                 'SaturationShift': 0, 
  89.                 'GeneralSettings': {
  90.                     'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  91.                     'AutoActionMode': App.Constants.AutoActionMode.Match,
  92.                     'Version': ((9,0,0),1)
  93.                     }
  94.                 })
  95.  
  96.     if not PSPUtils.IsGreyScale(Environment, App.TargetDocument):
  97.         # Greyscale
  98.         App.Do( Environment, 'Greyscale', {
  99.                 'GeneralSettings': {
  100.                     'ExecutionMode': App.Constants.ExecutionMode.Default, 
  101.                     'AutoActionMode': App.Constants.AutoActionMode.Match,
  102.                     'Version': ((9,0,0),1)
  103.                     }
  104.                 })
  105.  
  106.     # DigitalCameraNoiseRemoval
  107.     App.Do( Environment, 'DigitalCameraNoiseRemoval', {
  108.             'SmallDetails': 50, 
  109.             'MediumDetails': 50, 
  110.             'LargeDetails': 50, 
  111.             'Blending': 70, 
  112.             'Sharpening': 0, 
  113.             'LockDetailSettings': True, 
  114.             'NoiseColorAdjustment': ([4,2520,201,2520],), 
  115.             'Hue': 0, 
  116.             'Range': 0, 
  117.             'MinimalLuminance': -1, 
  118.             'MaximalLuminance': -1, 
  119.             'GeneralSettings': {
  120.                 'ExecutionMode': App.Constants.ExecutionMode.Silent, 
  121.                 'AutoActionMode': App.Constants.AutoActionMode.Match,
  122.                 'Version': ((9,0,0),1)
  123.                 }
  124.             })
  125.  
  126.  
  127.